home *** CD-ROM | disk | FTP | other *** search
/ IRIX Base Documentation 2001 May / SGI IRIX Base Documentation 2001 May.iso / usr / share / catman / p_man / cat3 / f90 / ieee_remainder.z / ieee_remainder
Encoding:
Text File  |  1998-10-30  |  3.4 KB  |  90 lines
  1. IEEE_REMAINDER(3I)                                     Last changed: 1-6-98
  2.  
  3.  
  4. NNAAMMEE
  5.      IIEEEEEE__RREEMMAAIINNDDEERR - Returns the remainder of _x divided by _y
  6.  
  7. SSYYNNOOPPSSIISS
  8.      IIEEEEEE__RREEMMAAIINNDDEERR (([XX==]_x,, [YY==]_y))
  9.  
  10. IIMMPPLLEEMMEENNTTAATTIIOONN
  11.      UNICOS/mk and IRIX systems
  12.  
  13.      CRAY T90 systems that support IEEE floating-point arithmetic
  14.  
  15. SSTTAANNDDAARRDDSS
  16.      CF90 and MIPSpro 7 Fortran 90 compiler extension to Fortran 90
  17.  
  18.      IEEE Standard for Binary Floating-point Arithmetic
  19.  
  20. DDEESSCCRRIIPPTTIIOONN
  21.      The IIEEEEEE__RREEMMAAIINNDDEERR intrinsic function returns the remainder of the
  22.      operation _x divided by _y.  Note that this function does not have
  23.      precisely the same definition as either of the Fortran 90 intrinsic
  24.      functions MMOODD(3M) or MMOODDUULLOO(3I).
  25.  
  26.      The IIEEEEEE__RREEMMAAIINNDDEERR function accepts the following arguments:
  27.  
  28.      _x         Must be of type real.  It can be scalar or an array.
  29.  
  30.      _y         Must be of type real.  If _x is scalar, _y can be scalar or an
  31.                array.  If _x is an array, _y can be scalar or an array of the
  32.                same shape as _x.
  33.  
  34.      IIEEEEEE__RREEMMAAIINNDDEERR is an elemental function.  The name of this intrinsic
  35.      cannot be passed as an argument.
  36.  
  37. NNOOTTEESS
  38.      The IEEE intrinsic procedures use the named constants contained in a
  39.      system module, so you must include one of the following statements in
  40.      your program:
  41.  
  42.      * On UNICOS and UNICOS/mk systems:  UUSSEE CCRRII__IIEEEEEE__DDEEFFIINNIITTIIOONNSS
  43.  
  44.      * On UNICOS, UNICOS/mk, and IRIX systems:  UUSSEE FFTTNN__IIEEEEEE__DDEEFFIINNIITTIIOONNSS
  45.  
  46.      The CCRRII__IIEEEEEE__DDEEFFIINNIITTIIOONNSS module is obsolescent.  It will be removed
  47.      for the CF90 4.0 release.
  48.  
  49. RREETTUURRNN VVAALLUUEESS
  50.      The same type and kind type parameter as the argument of the largest
  51.      precision and range.  For example, if _x is type RREEAALL((KKIINNDD==44)) and _y is
  52.      type RREEAALL((KKIINNDD==88)), the result is of type RREEAALL((KKIINNDD==88)).  If either _x or
  53.      _y is an array, the result is an array of the same shape as one of the
  54.      array arguments.
  55.  
  56.      The form of the result value is determined as follows:
  57.  
  58.      * If _x and _y are both scalar, the result is a scalar.
  59.  
  60.      * If _x is an array and _y is scalar, the result is an array in which
  61.        each element is the remainder of
  62.        _x  divided by _y.
  63.         _i
  64.  
  65.      * If _x is scalar and _y is an array, the result is an array in which
  66.        each element is the remainder of _x divided by
  67.        _y .
  68.         _i
  69.  
  70.      * If _x is an array and _y is an array, the result is an array in which
  71.        each element is the remainder of
  72.        _x  divided by _y .
  73.         _i             _i
  74.  
  75. EEXXAAMMPPLLEESS
  76.           REAL  x, y, r
  77.           ...                     ! Compute X and Y.
  78.           r = IEEE_REMAINDER(x, y)
  79.  
  80.           IF (r /= 0.0) THEN
  81.              ...
  82.           END IF
  83.  
  84. SSEEEE AALLSSOO
  85.      MMOODD(3M) MMOODDUULLOO(3I)
  86.  
  87.      _I_n_t_r_i_n_s_i_c _P_r_o_c_e_d_u_r_e_s _R_e_f_e_r_e_n_c_e _M_a_n_u_a_l, publication SR-2138, for the
  88.      printed version of this man page.
  89.  
  90.